perm filename HANG.SAI[1,DEK] blob sn#344638 filedate 1978-03-31 generic text, type C, neo UTF8
COMMENT ⊗   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	begin comment hang up in IOWQ
C00003 ENDMK
C⊗;
begin comment hang up in IOWQ;
string s; integer k;
print("Type <ctrl>a <ctrl>a:");
for k←1 step 1 until 1000000 do k←k;
s←inchwl;
ptostr(0,"Now try to type something:");
s←inchwl;
end